' Test ac Fval$ Tester.txt by b+ 2020-03-07 mod 2021-02-21 mod 2021-03-09
' I wrote in cpr just for this demo! Plus 
[
	cpr 2;*** Fval$ Tester ***   Note: I had to use {} for square brackets.
	cpr 5;Arith: a{1,1} > 2,  s{1,1} > 0,  x{2,3} > 6,  d{12,4} > 3     Constants: e = exp{1}, pi = pi{1}
	cpr 7;Math: modulus use m{3,2} > 1   power use p{2,3} > 8   log{}, exp{}, sqr{}, int{}, rnd{multiplier}
	cpr 9;Trig (radians): sin{}, cos{}, tan{}, asin{}, acos{}, atan{}     Angle Conversion: rad{degrees}, deg{radians}
	cpr 11;Boolean: #=# use eq{ , } for = numbers    noteq{ , } for <>    lt{ , } for <    lte{ , } for <=  
	cpr 13; gt{ , } for >   gte{ , } for >=   and{,,, }   or{,,, }   not{ }    seq{$,$} for string equal
	cpr 16;Get the cheat sheet and test string functions! Here a most:
	cpr 17;mid1, mid2, mid3, in2, in3, time, date, CAP, low, rtr (RTrim$), ltr (LTrim$), trim, spc, len
	
	' first test ever of fval$ working on arguments to loc, at, tag, graphics...
	loc a[17,3];5
	
	inps (just enter to quit) Enter an expression to evaluate; expression
	Jmp seq[expression,mt]
	result = fval[expression]
	at 5;22
	cpr 22;The Tester came up with this: ;result
	cpr 25;Wait 5 secs...
	Wait 5
	Cls
]
.
. Goodbye!